home *** CD-ROM | disk | FTP | other *** search
/ CD Loisirs 6 / CDL_N6.iso / mac / CD Loisirs N°6 / PaperPlanes / Demo / 00037.ls < prev    next >
Encoding:
Text File  |  1994-08-25  |  165 b   |  6 lines
  1. on exitFrame
  2.   global theGauge
  3.   set theSlider to the number of cast "SliderDrag"
  4.   set theGauge to birth(script "FuelGauge", 20, 21, theSlider, "CurrentLevel")
  5. end
  6.